home *** CD-ROM | disk | FTP | other *** search
/ Flashy TrueType Fonts / Flashy TrueType Fonts.iso / garden / install.dat < prev    next >
Encoding:
INSTALL Professional project  |  1996-06-09  |  3.4 KB  |  138 lines

  1. /*
  2.  * INSTALL.DAT
  3.  * Project: GARDEN ARCHITECT
  4.  * Version: 1.32
  5. */
  6.  
  7. @DefineProject
  8.     @Name = "GARDEN ARCHITECT"
  9.     @Version = "1.32"
  10.     @Subdir = "\\GARDEN"
  11.     @OutDrive = Z
  12. @EndProject
  13. @DefineVars
  14.     @Qstring @PkgType   = "BOX"
  15.     @Integer @Blue       = @RGB(0,0,255)             //DEFINE COLOR BLUE
  16.     @Integer @Black      = @RGB(0,0,0)               //DEFINE COLOR BLACK
  17. @EndVars
  18. @PkgType = @GetINI("COSMI CDSETUP", "PkgMethod")
  19.  
  20.  
  21. @BackgroundMode(3,@Blue,@Black)
  22. @Display
  23.     @Cls
  24.  
  25.  
  26.     Congratulations on your purchase of @Name!
  27.     
  28.     This program will now install @Name 
  29.     to your hard disk drive and verify the integrity
  30.     of the CD-ROM disk. You may press the [Esc] key
  31.     at any time to abort the installation.
  32.  
  33.  
  34.     @Pause
  35. @EndDisplay
  36.  
  37. @GetOutDrive
  38.     @Cls
  39.     Select the HARD disk drive on which you wish to install your
  40.     new copy of @Name.
  41.     ie. "Drive C:"
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.     
  52.     @Suppress(0, 1)
  53.     Use the [CURSOR] to highlight a drive letter. Press [ENTER]
  54.     to select that drive.
  55.     
  56.  
  57. @EndOutDrive
  58.  
  59.  
  60. @GetSubdir
  61.     @Cls
  62.     INSTALL is now suggesting a name for a program destination subdirectory 
  63.     to which files will be copied. Press [ENTER] to use @OutDrive:@SubDir,
  64.     or type "\" and a "path", where "path" is the subdirectory you want INSTALL
  65.     to use.
  66.     
  67.  
  68. @Prompt = "Which subdirectory ([Enter] = @Subdir) ?"
  69. @EndSubdir
  70.  
  71. @DefineVars
  72.     @Qstring @Item1 = "@OutDrive:\\@Subdir\\garden.exe, Garden Architect,
  73.                @OutDrive:\\@Subdir\\garden.exe"
  74.     @Qstring @Item2 = "@OutDrive:\\@Subdir\\manual.wri, Garden Architect Manual,
  75.                @OutDrive:\\@Subdir\\manual.wri"
  76.     @Qstring @Item3 = "@OutDrive:\\@Subdir\\garden.hlp, Garden Architect Help,
  77.                @OutDrive:\\@Subdir\\garden.hlp"
  78.     @Qstring @Item4 = "@OutDrive:\\@Subdir\\Bloxs.exe, Bloxs,
  79.                @OutDrive:\\@Subdir\\Bloxs.exe"
  80.     @Qstring @Item5 = "@OutDrive:\\@Subdir\\Bloxs.wri, Bloxs Manual,
  81.                @OutDrive:\\@Subdir\\Bloxs.wri"
  82. @EndVars
  83.  
  84. @DefineDisk
  85.     @Label = "GARDEN  Disk #1"
  86.     @BeginLib 221.001
  87.         @F GARDEN.HLP @S 79487 @O GARDEN.HLP
  88.         @F GARDEN.EXE @S 729600 @O GARDEN.EXE
  89.         @F FRONT.ICO @S 766 @O FRONT.ICO
  90.         @F LIBRARY.ICO @S 766 @O LIBRARY.ICO
  91.         @F PLAN.ICO @S 766 @O PLAN.ICO
  92.         @F SAMPLE.LND @S 1136 @O SAMPLE.LND
  93.         @F OBJECT.DAT @S 3619677 @O OBJECT.DAT
  94.         @F MANUAL.WRI @S 10624 @O MANUAL.WRI
  95.     @EndLib
  96.        @If (@FileDate("@OutDrive:\\WINDOWS\\SYSTEM\\CTL3DV2.DLL") 
  97.            < @StrToDate("1994/8/22"))
  98.           // CTL3DV2.DLL is older than 08/22/94, so replace it 
  99.         @File CTL3DV2.DLL @S 10368 @O C:\WINDOWS\SYSTEM\CTL3DV2.DLL
  100.       @EndIf
  101.  
  102. @EndDisk
  103.  
  104. @Finish
  105. @Cls
  106. @If("@PkgType" == "JEWEL")
  107.     @ProgramManager("[CreateGroup(COSMI Garden Architect)]
  108.          [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
  109.          [AddItem(@Item3, 0)]
  110.          [AddItem(@Item4, 0)][AddItem(@Item5, 0)]")
  111.     @Copy("Bloxs.exe", "@OutDrive:\\@Subdir\\*.exe")
  112.     @Copy("Bloxs.wri", "@OutDrive:\\@Subdir\\*.*")
  113. @Else
  114.     @ProgramManager("[CreateGroup(COSMI Garden Architect)]
  115.          [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
  116.          [AddItem(@Item3, 0)]
  117.          [AddItem(@Item4, 0)][AddItem(@Item5, 0)]")
  118.     @Copy("Bloxs.exe", "@OutDrive:\\@Subdir\\*.exe")
  119.     @Copy("Bloxs.wri", "@OutDrive:\\@Subdir\\*.*")     
  120. @EndIf
  121.     @ChDrive @OutDrive
  122.     @ChDir "@SubDir"
  123.     //delete files from cosmitmp.dir and remove that dir
  124.     @Delete("@OutDrive:\\cosmitmp.dir\\*.*")
  125.     @RmDir("@OutDrive:\\cosmitmp.dir")
  126.  
  127. @Cls    
  128.     Installation of @Name is now finished.
  129.     A New application group has been created titled COSMI.
  130.  
  131.  
  132.  
  133.  
  134.     @Pause
  135. @EndFinish
  136.  
  137. /* end-of-file */
  138.